#!/usr/bin/perl
print "This is my first perl program.\n";
$a=<>;
print $a;